home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 4 / FM Towns Free Software Collection 4 - Disc 1.iso / msdos / vzfm / vzfm.bat < prev    next >
DOS Batch File  |  1991-10-18  |  2KB  |  68 lines

  1. echo off
  2. rem FM版VZを作成するバッチ
  3. rem 使用法:
  4. rem   vzfm オリジナルディスクのドライブ [レベル番号]
  5. rem     カレントディレクトリに全ての差分ファイル等をおいておくこと
  6. rem     カレントディレクトリに十分な空き(約1MB)がないといけません
  7. if "%1"=="" GOTO ERROR1
  8. if "%2"=="" set LV=12
  9. if not "%2"=="" set LV=%2
  10. copy %1:\vz.com
  11. if errorlevel 1 goto ERROR1
  12. if not exist VZR50%LV%.COM GOTO 16B
  13. if exist vzr50.com del vzr50.com
  14. ren vz.com vzR50.com
  15. VZR50%LV%
  16. if errorlevel 1 GOTO ERROR2
  17. copy vzfmr.def vzR50.def
  18. :16B
  19. if not exist VZ16B%LV%.COM GOTO R30
  20. if exist vz16b.com del vz16b.com
  21. ren vz.com vz16B.com
  22. vz16B%LV%
  23. if errorlevel 1 GOTO ERROR2
  24. :R30
  25. if not exist VZR30%LV%.COM GOTO R60
  26. if exist vzr30.com del vzr30.com
  27. ren vz.com vzR30.com
  28. VZR30%LV%
  29. if errorlevel 1 GOTO ERROR2
  30. copy vzfmrm.def vzR30.def
  31. :R60
  32. if not exist VZR60%LV%.COM GOTO FMT
  33. if exist vzr60.com del vzr60.com
  34. ren vz.com vzR60.com
  35. VZR60%LV%
  36. if errorlevel 1 GOTO ERROR2
  37. copy vzfmr.def vzR60.def
  38. :FMT
  39. if not exist VZFMT%LV%.COM GOTO SRC
  40. if exist vzfmt.com del vzfmt.com
  41. ren vz.com vzFMT.com
  42. VZFMT%LV%
  43. if errorlevel 1 GOTO ERROR2
  44. :copy vzfmr.def vzFMT.def
  45. :SRC
  46. if not exist VZFMS%LV%.BDF GOTO EXIT
  47. copy %1:\src\*.inc
  48. copy %1:\src\*.asm
  49. ren key98.asm keyfm.asm
  50. ren scrn98.asm scrnfm.asm
  51. bupdate vzfms%LV%
  52. rem ↑ bupmini vzfms%LV% としても可
  53. goto EXIT
  54. :ERROR1
  55. echo 使用法:
  56. echo   "vzfm <VZオリジナルディスクのドライブ>  [FM版VZのレベル番号]"
  57. echo     例:
  58. echo        vzfm B 12
  59. echo/
  60. :ERROR2
  61. echo     カレントディレクトリに全ての差分ファイル等をおいておくこと
  62. echo     カレントディレクトリに十分な空き(約1MB)が必要です
  63. echo     ソースファイルの復元には,BUPDATE.EXE が必要です
  64. :EXIT
  65. del VZ.com >nul
  66. del *.org >nul
  67. dir VZ???.com
  68.